home *** CD-ROM | disk | FTP | other *** search
Text File | 1996-05-01 | 1.8 KB | 84 lines | [TEXT/MPS ] |
- ;
- ; File: Tokenize.a
- ;
- ; Contains: Text Services Manager Tokenizer interfaces
- ;
- ; Version: Technology: System 8.0
- ; Release: Universal Interfaces 3.0d3 on Copland DR1
- ;
- ; Copyright: © 1984-1996 by Apple Computer, Inc. All rights reserved.
- ;
- ; Bugs?: If you find a problem with this file, send the file and version
- ; information (from above) and the problem description to:
- ;
- ; Internet: apple.bugs@applelink.apple.com
- ; AppleLink: APPLE.BUGS
- ;
- ;
- IF &TYPE('__TOKENIZE__') = 'UNDEFINED' THEN
- __TOKENIZE__ SET 1
-
- IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
- include 'Types.a'
- ENDIF
- IF &TYPE('__TEXTOBJECTS__') = 'UNDEFINED' THEN
- include 'TextObjects.a'
- ENDIF
- IF &TYPE('__TEXTSERVICES__') = 'UNDEFINED' THEN
- include 'TextServices.a'
- ENDIF
- IF FOR_SYSTEM8_PREEMPTIVE THEN
-
- kTKNNoControlFlags EQU 0
- kTKNSplitTextStreamFlag EQU 1
- ;
- ; *
- ; * Tokenize Functions
- ; *
- ;
- ;
- ; extern OSStatus TKNSetTextRun(TSMContext context, TextObject run)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION TKNSetTextRun
- ENDIF
-
- ;
- ; extern OSStatus TKNGetTextRun(TSMContext context, TextObject run)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION TKNGetTextRun
- ENDIF
-
- ;
- ; extern OSStatus TKNGetNextToken(TSMContext context, TextObject token)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION TKNGetNextToken
- ENDIF
-
- ;
- ; extern OSStatus TKNGetTokenPosition(TSMContext context, TextObjectIndex *theStart, TextObjectIndex *theEnd)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION TKNGetTokenPosition
- ENDIF
-
- ;
- ; extern OSStatus TKNSetControlFlags(TSMContext context, long controlFlags)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION TKNSetControlFlags
- ENDIF
-
- ;
- ; extern OSStatus TKNGetControlFlags(TSMContext context, long *controlFlags)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION TKNGetControlFlags
- ENDIF
-
- ENDIF
- ENDIF ; __TOKENIZE__
-
-